* Figure 7- Evolution over time of the inverse of competitiveness and the mean proportion of correct answers*
clear all
use Clean_data, clear

gen prop_corr = test_correct/ answered
bysort year: egen mean_prop_corr = mean(prop_corr)

twoway (line inv_competNOQUOTA year , lpattern(dash) lcolor(black)) ///
       (line mean_prop_corr year if year != 1987 & year != 1988, lpattern(solid) lcolor(black)), ///
       ylabel(0(0.1)1) ///
       legend(order(1 "Inverse Comp" 2 "Prop. Correct") ///
              cols(2) position(6))

